home *** CD-ROM | disk | FTP | other *** search
/ Linux Cubed Series 7: Sunsite / Linux Cubed Series 7 - Sunsite Vol 1.iso / libs / libelf-0.5 / libelf-0 / libelf-0.5.2 / nextscn.c < prev    next >
Encoding:
C/C++ Source or Header  |  1995-10-19  |  1.5 KB  |  51 lines
  1. /*
  2. nextscn.c - implementation of the elf_nextscn(3) function.
  3. Copyright (C) 1995 Michael Riepe <riepe@ifwsn4.ifw.uni-hannover.de>
  4.  
  5. This library is free software; you can redistribute it and/or
  6. modify it under the terms of the GNU Library General Public
  7. License as published by the Free Software Foundation; either
  8. version 2 of the License, or (at your option) any later version.
  9.  
  10. This library is distributed in the hope that it will be useful,
  11. but WITHOUT ANY WARRANTY; without even the implied warranty of
  12. MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
  13. Library General Public License for more details.
  14.  
  15. You should have received a copy of the GNU Library General Public
  16. License along with this library; if not, write to the Free Software
  17. Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.
  18. */
  19.  
  20. #include <private.h>
  21.  
  22. Elf_Scn*
  23. elf_nextscn(Elf *elf, Elf_Scn *scn) {
  24.     if (!elf) {
  25.     return NULL;
  26.     }
  27.     elf_assert(elf->e_magic == ELF_MAGIC);
  28.     if (scn) {
  29.     elf_assert(scn->s_magic == SCN_MAGIC);
  30.     if (scn->s_elf == elf) {
  31.         return scn->s_link;
  32.     }
  33.     seterr(ERROR_ELFSCNMISMATCH);
  34.     }
  35.     else if (elf->e_kind != ELF_K_ELF) {
  36.     seterr(ERROR_NOTELF);
  37.     }
  38.     else if (elf->e_ehdr || _elf_cook(elf)) {
  39.     elf_assert(elf->e_ehdr);
  40.     for (scn = elf->e_scn_1; scn; scn = scn->s_link) {
  41.         elf_assert(scn->s_magic == SCN_MAGIC);
  42.         elf_assert(scn->s_elf == elf);
  43.         if (scn->s_index == 1) {
  44.         return scn;
  45.         }
  46.     }
  47.     seterr(ERROR_NOSUCHSCN);
  48.     }
  49.     return NULL;
  50. }
  51.